home *** CD-ROM | disk | FTP | other *** search
/ Tiger Disk 108 / Tiger_Disk_108_20xx_Tiger-Crew-Disk_de_Side_B.d64 / anl. unidat pro (.txt) < prev    next >
Commodore BASIC  |  2023-02-26  |  3KB  |  74 lines
  1. 10 poke53280,5:poke53281,5
  2. 110 print"[147]"
  3. 115 print"     u n i d a t   p r o      v2.1"
  4. 120 print:print" universelles datenverwaltungsprogramm"
  5. 130 print"----------------------------------------"
  6. 140 print"das programm wird mit"
  7. 150 print"[load][146]'unidatpro',8  geladen und mit"
  8. 160 print"[run][146] gestartet."
  9. 170 print:print"die dateimasken sind frei waehlbar."
  10. 180 print"moechte man eine existente maske haben,"
  11. 190 print"so werden die vorhandenen masken am"
  12. 200 print"bildschirm gezeigt und koennen dann "
  13. 210 print"geladen werden. selbst erstellte masken"
  14. 220 print"koennen gespeichert werden."
  15. 224 ifpr=1then230
  16. 225 gosub 1000
  17. 230 print:print"eine maske kann max. 10 datenfelder"
  18. 240 print"haben. die datei darf je nach masken-"
  19. 250 print"groesse 300 - 500 datensaetze umfassen."
  20. 260 print:print"nach erstellen/laden der maske gelangt"
  21. 270 print"man ins menue."
  22. 280 print:print"generell gilt, dass man aus jedem "
  23. 290 print"menuepunkt mit [f2][146] wieder ins haupt-"
  24. 300 print"menue gelangt."
  25. 310 print:print"bei eingabe von datensaetzen kann man "
  26. 320 print"sich frei im datenfeld bewegen."
  27. 330 print"nach eingabe eines datensatzes wird "
  28. 340 print"dieser mit [f1][146] in den speicher ueber-"
  29. 350 print"nommen. dabei springt der cursor in die"
  30. 351 print"linke obere ecke."
  31. 352 ifpr=1then360
  32. 355 gosub 1000
  33. 360 print:print"in den programmteilen 'suchen, aendern,"
  34. 370 print"loeschen' muss ein suchbegriff links-"
  35. 380 print"buendig eingegeben werden. die eingabe"
  36. 390 print"ist dann mit [f1][146] abzuschliessen."
  37. 400 print:print"bei der gesamtuebersicht wird mit "
  38. 410 print"den tasten [cursor rechts/links][146]"
  39. 420 print"in den datensaetzen geblaettert.":ifpr=1then2000
  40. 470 gosub1000:gosub2000
  41. 480 print:print"fuer den schnellen einstieg sind auf"
  42. 490 print"dieser diskette die masken 'video' und"
  43. 500 print"'adressen' mit den dazugehoerigen "
  44. 510 print"dateien 'videodaten' und 'adressdaten'"
  45. 520 print"als beispiele gesichert. nach anwahl"
  46. 530 print"wird die entsprechende maske geladen"
  47. 540 print"und aus dem menue kann mit [7][146] die"
  48. 550 print"dazugehoerige datei geladen werden."
  49. 560 print"danach kann man alle programmteile aus-"
  50. 570 print"probieren."
  51. 580 print"        und nun viel vergnuegen   [146]"
  52. 590 print"anleitung drucken [j/n] ?"
  53. 595 getpr$:ifpr$<>"j"andpr$<>"n"then595
  54. 596 ifpr$="n"thenend
  55. 700 pr=1:open4,4:cmd4:print:goto115
  56. 1000 print"taste[146]"
  57. 1010 get a$:ifa$=""then1010
  58. 1020 print"[147]":return
  59. 2000 print:print"zu beachten:[146]":print:print" 1) daten werden immer ab dateianfang"
  60. 2010 print"    geladen, ein 'dazuladen' ist nicht[146]":print"    moeglich!"
  61. 2020 print:print" 2) im menue-punkt 'service' koennen die":print"    farben fuer screen";
  62. 2030 print" und schrift":print"    eingestellt werden."
  63. 2040 print:print"    ebenso wird von hier aus das prg.":print"    mit [f8][146] verlassen."
  64. 2050 print:print"    wurde das prg.-ende versehentlich":print"    angewaehlt, kommt man";
  65. 2060 print" ohne daten-":print"    verlust durch eingabe von [cont][146]"
  66. 2070 print"    und anschliessendem druecken von":print"    [f2][146] wieder zum menue."
  67. 2075 ifpr=1then2080
  68. 2076 gosub1000
  69. 2080 print:print" 3) beim speichern wird ein eventuell":print"    unter gleichem ";
  70. 2090 print"namen auf ":print"    der disk befindliches file ge-"
  71. 2100 print"    loescht. - um dies zu vermeiden,":print"    darauf achten, welcher";
  72. 2110 print" dateiname":print"    verwendet wird!":ifpr=1thenprint#4:close4:end
  73. 2120 gosub1000:return
  74.